home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AOL File Library: 4,401 to 4,500
/
aol-file-protocol-4400-4401-to-4500.zip
/
AOLDLs
/
PDA-Newton Development
/
ND Register Sample Code
/
RegisterSampleCode.sit
/
RegisterSampleCode ƒ
/
project data
< prev
next >
Wrap
Text File
|
1994-11-26
|
539b
|
24 lines
constant kAppSymbol := '|RegTest:FlaSheridn| ;
constant kSharewareFee := 42;
//constant kSharewareFeeString := "$42"; //optional
constant kVersionString := "1.0d1";
write("\n" & "_______________________________________" & "\n"
& kAppSymbol && kVersionString &&
dateNTime(Time()) &
"\n" & "_______________________________________" & "\n" & "\n");
defconst( 'kReverseStringsFunc,
func(a,b,c)
begin
local inp := a && b && c ;
local out := "";
for i := 0 to strLen(inp) -1
do out := inp[i] & out;
return out;
end;
);